home *** CD-ROM | disk | FTP | other *** search
Unknown | 2004-01-13 | 7.8 KB |
open in:
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence | Program | Detection | Match Type | Support
|
---|
100%
| file
| data
| default
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 4d 7d 63 6c 61 73 73 20 |........|M}class |
|00000010| 55 57 69 6e 64 6f 77 44 | 79 6e 61 6d 69 63 54 65 |UWindowD|ynamicTe|
|00000020| 78 74 41 72 65 61 20 65 | 78 74 65 6e 64 73 20 55 |xtArea e|xtends U|
|00000030| 57 69 6e 64 6f 77 44 69 | 61 6c 6f 67 43 6f 6e 74 |WindowDi|alogCont|
|00000040| 72 6f 6c 3b 0d 0a 0d 0a | 76 61 72 20 63 6f 6e 66 |rol;....|var conf|
|00000050| 69 67 20 69 6e 74 20 4d | 61 78 4c 69 6e 65 73 3b |ig int M|axLines;|
|00000060| 0d 0a 0d 0a 76 61 72 20 | 62 6f 6f 6c 20 62 54 6f |....var |bool bTo|
|00000070| 70 43 65 6e 74 72 69 63 | 3b 0d 0a 76 61 72 20 66 |pCentric|;..var f|
|00000080| 6c 6f 61 74 20 44 65 66 | 61 75 6c 74 54 65 78 74 |loat Def|aultText|
|00000090| 48 65 69 67 68 74 3b 0d | 0a 76 61 72 20 62 6f 6f |Height;.|.var boo|
|000000a0| 6c 20 62 53 63 72 6f 6c | 6c 4f 6e 52 65 73 69 7a |l bScrol|lOnResiz|
|000000b0| 65 3b 0d 0a 76 61 72 20 | 62 6f 6f 6c 20 62 56 43 |e;..var |bool bVC|
|000000c0| 65 6e 74 65 72 3b 0d 0a | 76 61 72 20 62 6f 6f 6c |enter;..|var bool|
|000000d0| 20 62 48 43 65 6e 74 65 | 72 3b 0d 0a 76 61 72 20 | bHCente|r;..var |
|000000e0| 62 6f 6f 6c 20 62 41 75 | 74 6f 53 63 72 6f 6c 6c |bool bAu|toScroll|
|000000f0| 62 61 72 3b 0d 0a 76 61 | 72 20 62 6f 6f 6c 20 62 |bar;..va|r bool b|
|00000100| 56 61 72 69 61 62 6c 65 | 52 6f 77 48 65 69 67 68 |Variable|RowHeigh|
|00000110| 74 3b 09 2f 2f 20 41 73 | 73 75 6d 65 73 20 21 62 |t;.// As|sumes !b|
|00000120| 54 6f 70 43 65 6e 74 72 | 69 63 2c 20 21 62 53 63 |TopCentr|ic, !bSc|
|00000130| 72 6f 6c 6c 4f 6e 52 65 | 73 69 7a 65 0d 0a 76 61 |rollOnRe|size..va|
|00000140| 72 20 66 6c 6f 61 74 20 | 57 72 61 70 57 69 64 74 |r float |WrapWidt|
|00000150| 68 3b 0d 0a 0d 0a 2f 2f | 20 70 72 69 76 61 74 65 |h;....//| private|
|00000160| 0d 0a 76 61 72 20 55 57 | 69 6e 64 6f 77 44 79 6e |..var UW|indowDyn|
|00000170| 61 6d 69 63 54 65 78 74 | 52 6f 77 20 4c 69 73 74 |amicText|Row List|
|00000180| 3b 0d 0a 76 61 72 20 55 | 57 69 6e 64 6f 77 56 53 |;..var U|WindowVS|
|00000190| 63 72 6f 6c 6c 42 61 72 | 20 56 65 72 74 53 42 3b |crollBar| VertSB;|
|000001a0| 0d 0a 76 61 72 20 66 6c | 6f 61 74 20 4f 6c 64 57 |..var fl|oat OldW|
|000001b0| 2c 20 4f 6c 64 48 3b 0d | 0a 76 61 72 20 62 6f 6f |, OldH;.|.var boo|
|000001c0| 6c 20 62 44 69 72 74 79 | 3b 0d 0a 76 61 72 20 69 |l bDirty|;..var i|
|000001d0| 6e 74 20 43 6f 75 6e 74 | 3b 0d 0a 76 61 72 20 69 |nt Count|;..var i|
|000001e0| 6e 74 20 56 69 73 69 62 | 6c 65 52 6f 77 73 3b 0d |nt Visib|leRows;.|
|000001f0| 0a 76 61 72 20 69 6e 74 | 20 46 6f 6e 74 3b 0d 0a |.var int| Font;..|
|00000200| 76 61 72 20 46 6f 6e 74 | 20 41 62 73 6f 6c 75 74 |var Font| Absolut|
|00000210| 65 46 6f 6e 74 3b 0d 0a | 76 61 72 20 63 6f 6c 6f |eFont;..|var colo|
|00000220| 72 20 54 65 78 74 43 6f | 6c 6f 72 3b 0d 0a 76 61 |r TextCo|lor;..va|
|00000230| 72 20 63 6c 61 73 73 3c | 55 57 69 6e 64 6f 77 44 |r class<|UWindowD|
|00000240| 79 6e 61 6d 69 63 54 65 | 78 74 52 6f 77 3e 20 52 |ynamicTe|xtRow> R|
|00000250| 6f 77 43 6c 61 73 73 3b | 0d 0a 0d 0a 66 75 6e 63 |owClass;|....func|
|00000260| 74 69 6f 6e 20 43 72 65 | 61 74 65 64 28 29 0d 0a |tion Cre|ated()..|
|00000270| 7b 0d 0a 09 53 75 70 65 | 72 2e 43 72 65 61 74 65 |{...Supe|r.Create|
|00000280| 64 28 29 3b 0d 0a 0d 0a | 09 56 65 72 74 53 42 20 |d();....|.VertSB |
|00000290| 3d 20 55 57 69 6e 64 6f | 77 56 53 63 72 6f 6c 6c |= UWindo|wVScroll|
|000002a0| 62 61 72 28 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |bar(Crea|teWindow|
|000002b0| 28 63 6c 61 73 73 27 55 | 57 69 6e 64 6f 77 56 53 |(class'U|WindowVS|
|000002c0| 63 72 6f 6c 6c 62 61 72 | 27 2c 20 57 69 6e 57 69 |crollbar|', WinWi|
|000002d0| 64 74 68 2d 31 32 2c 20 | 30 2c 20 31 32 2c 20 57 |dth-12, |0, 12, W|
|000002e0| 69 6e 48 65 69 67 68 74 | 29 29 3b 0d 0a 09 56 65 |inHeight|));...Ve|
|000002f0| 72 74 53 42 2e 62 41 6c | 77 61 79 73 4f 6e 54 6f |rtSB.bAl|waysOnTo|
|00000300| 70 20 3d 20 54 72 75 65 | 3b 0d 0a 09 43 75 72 73 |p = True|;...Curs|
|00000310| 6f 72 20 3d 20 52 6f 6f | 74 2e 4e 6f 72 6d 61 6c |or = Roo|t.Normal|
|00000320| 43 75 72 73 6f 72 3b 0d | 0a 0d 0a 09 43 6c 65 61 |Cursor;.|....Clea|
|00000330| 72 28 29 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |r();..}.|...funct|
|00000340| 69 6f 6e 20 43 6c 65 61 | 72 28 29 0d 0a 7b 0d 0a |ion Clea|r()..{..|
|00000350| 09 62 44 69 72 74 79 20 | 3d 20 54 72 75 65 3b 0d |.bDirty |= True;.|
|00000360| 0a 0d 0a 09 69 66 28 4c | 69 73 74 20 21 3d 20 4e |....if(L|ist != N|
|00000370| 6f 6e 65 29 0d 0a 09 7b | 0d 0a 09 09 69 66 28 4c |one)...{|....if(L|
|00000380| 69 73 74 2e 4e 65 78 74 | 20 3d 3d 20 4e 6f 6e 65 |ist.Next| == None|
|00000390| 29 0d 0a 09 09 09 72 65 | 74 75 72 6e 3b 0d 0a 09 |).....re|turn;...|
|000003a0| 09 4c 69 73 74 2e 44 65 | 73 74 72 6f 79 4c 69 73 |.List.De|stroyLis|
|000003b0| 74 28 29 3b 0d 0a 09 7d | 0d 0a 0d 0a 09 4c 69 73 |t();...}|.....Lis|
|000003c0| 74 20 3d 20 6e 65 77 20 | 52 6f 77 43 6c 61 73 73 |t = new |RowClass|
|000003d0| 3b 0d 0a 09 4c 69 73 74 | 2e 53 65 74 75 70 53 65 |;...List|.SetupSe|
|000003e0| 6e 74 69 6e 65 6c 28 29 | 3b 0d 0a 7d 0d 0a 0d 0a |ntinel()|;..}....|
|000003f0| 66 75 6e 63 74 69 6f 6e | 20 53 65 74 41 62 73 6f |function| SetAbso|
|00000400| 6c 75 74 65 46 6f 6e 74 | 28 46 6f 6e 74 20 46 29 |luteFont|(Font F)|
|00000410| 0d 0a 7b 0d 0a 09 41 62 | 73 6f 6c 75 74 65 46 6f |..{...Ab|soluteFo|
|00000420| 6e 74 20 3d 20 46 3b 0d | 0a 7d 0d 0a 0d 0a 66 75 |nt = F;.|.}....fu|
|00000430| 6e 63 74 69 6f 6e 20 53 | 65 74 46 6f 6e 74 28 69 |nction S|etFont(i|
|00000440| 6e 74 20 46 29 0d 0a 7b | 0d 0a 09 46 6f 6e 74 20 |nt F)..{|...Font |
|00000450| 3d 20 46 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |= F;..}.|...funct|
|00000460| 69 6f 6e 20 53 65 74 54 | 65 78 74 43 6f 6c 6f 72 |ion SetT|extColor|
|00000470| 28 43 6f 6c 6f 72 20 43 | 29 0d 0a 7b 0d 0a 09 54 |(Color C|)..{...T|
|00000480| 65 78 74 43 6f 6c 6f 72 | 20 3d 20 43 3b 0d 0a 7d |extColor| = C;..}|
|00000490| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 54 65 78 |....func|tion Tex|
|000004a0| 74 41 72 65 61 43 6c 69 | 70 54 65 78 74 28 43 61 |tAreaCli|pText(Ca|
|000004b0| 6e 76 61 73 20 43 2c 20 | 66 6c 6f 61 74 20 44 72 |nvas C, |float Dr|
|000004c0| 61 77 58 2c 20 66 6c 6f | 61 74 20 44 72 61 77 59 |awX, flo|at DrawY|
|000004d0| 2c 20 63 6f 65 72 63 65 | 20 73 74 72 69 6e 67 20 |, coerce| string |
|000004e0| 53 2c 20 6f 70 74 69 6f | 6e 61 6c 20 62 6f 6f 6c |S, optio|nal bool|
|000004f0| 20 62 43 68 65 63 6b 48 | 6f 74 6b 65 79 29 0d 0a | bCheckH|otkey)..|
|00000500| 7b 0d 0a 09 43 6c 69 70 | 54 65 78 74 28 43 2c 20 |{...Clip|Text(C, |
|00000510| 44 72 61 77 58 2c 20 44 | 72 61 77 59 2c 20 53 2c |DrawX, D|rawY, S,|
|00000520| 20 62 43 68 65 63 6b 48 | 6f 74 6b 65 79 29 3b 09 | bCheckH|otkey);.|
|00000530| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|00000540| 54 65 78 74 41 72 65 61 | 54 65 78 74 53 69 7a 65 |TextArea|TextSize|
|00000550| 28 43 61 6e 76 61 73 20 | 43 2c 20 73 74 72 69 6e |(Canvas |C, strin|
|00000560| 67 20 54 65 78 74 2c 20 | 6f 75 74 20 66 6c 6f 61 |g Text, |out floa|
|00000570| 74 20 57 2c 20 6f 75 74 | 20 66 6c 6f 61 74 20 48 |t W, out| float H|
|00000580| 29 0d 0a 7b 0d 0a 09 54 | 65 78 74 53 69 7a 65 28 |)..{...T|extSize(|
|00000590| 43 2c 20 54 65 78 74 2c | 20 57 2c 20 48 29 3b 0d |C, Text,| W, H);.|
|000005a0| 0a 7d 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 42 |.}....fu|nction B|
|000005b0| 65 66 6f 72 65 50 61 69 | 6e 74 28 20 43 61 6e 76 |eforePai|nt( Canv|
|000005c0| 61 73 20 43 2c 20 66 6c | 6f 61 74 20 58 2c 20 66 |as C, fl|oat X, f|
|000005d0| 6c 6f 61 74 20 59 20 29 | 0d 0a 7b 0d 0a 09 53 75 |loat Y )|..{...Su|
|000005e0| 70 65 72 2e 42 65 66 6f | 72 65 50 61 69 6e 74 28 |per.Befo|rePaint(|
|000005f0| 43 2c 20 58 2c 20 59 29 | 3b 0d 0a 0d 0a 09 56 65 |C, X, Y)|;.....Ve|
|00000600| 72 74 53 42 2e 57 69 6e | 54 6f 70 20 3d 20 30 3b |rtSB.Win|Top = 0;|
|00000610| 0d 0a 09 56 65 72 74 53 | 42 2e 57 69 6e 48 65 69 |...VertS|B.WinHei|
|00000620| 67 68 74 20 3d 20 57 69 | 6e 48 65 69 67 68 74 3b |ght = Wi|nHeight;|
|00000630| 0d 0a 09 56 65 72 74 53 | 42 2e 57 69 6e 57 69 64 |...VertS|B.WinWid|
|00000640| 74 68 20 3d 20 4c 6f 6f | 6b 41 6e 64 46 65 65 6c |th = Loo|kAndFeel|
|00000650| 2e 53 69 7a 65 5f 53 63 | 72 6f 6c 6c 62 61 72 57 |.Size_Sc|rollbarW|
|00000660| 69 64 74 68 3b 0d 0a 09 | 56 65 72 74 53 42 2e 57 |idth;...|VertSB.W|
|00000670| 69 6e 4c 65 66 74 20 3d | 20 57 69 6e 57 69 64 74 |inLeft =| WinWidt|
|00000680| 68 20 2d 20 4c 6f 6f 6b | 41 6e 64 46 65 65 6c 2e |h - Look|AndFeel.|
|00000690| 53 69 7a 65 5f 53 63 72 | 6f 6c 6c 62 61 72 57 69 |Size_Scr|ollbarWi|
|000006a0| 64 74 68 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |dth;..}.|...funct|
|000006b0| 69 6f 6e 20 50 61 69 6e | 74 28 20 43 61 6e 76 61 |ion Pain|t( Canva|
|000006c0| 73 20 43 2c 20 66 6c 6f | 61 74 20 4d 6f 75 73 65 |s C, flo|at Mouse|
|000006d0| 58 2c 20 66 6c 6f 61 74 | 20 4d 6f 75 73 65 59 20 |X, float| MouseY |
|000006e0| 29 0d 0a 7b 0d 0a 09 6c | 6f 63 61 6c 20 55 57 69 |)..{...l|ocal UWi|
|000006f0| 6e 64 6f 77 44 79 6e 61 | 6d 69 63 54 65 78 74 52 |ndowDyna|micTextR|
|00000700| 6f 77 20 4c 3b 0d 0a 09 | 6c 6f 63 61 6c 20 69 6e |ow L;...|local in|
|00000710| 74 20 53 6b 69 70 43 6f | 75 6e 74 2c 20 44 72 61 |t SkipCo|unt, Dra|
|00000720| 77 43 6f 75 6e 74 3b 0d | 0a 09 6c 6f 63 61 6c 20 |wCount;.|..local |
|00000730| 69 6e 74 20 69 3b 0d 0a | 09 6c 6f 63 61 6c 20 66 |int i;..|.local f|
|00000740| 6c 6f 61 74 20 59 2c 20 | 4a 75 6e 6b 3b 0d 0a 09 |loat Y, |Junk;...|
|00000750| 6c 6f 63 61 6c 20 62 6f | 6f 6c 20 62 57 72 61 70 |local bo|ol bWrap|
|00000760| 70 65 64 3b 0d 0a 0d 0a | 09 43 2e 44 72 61 77 43 |ped;....|.C.DrawC|
|00000770| 6f 6c 6f 72 20 3d 20 54 | 65 78 74 43 6f 6c 6f 72 |olor = T|extColor|
|00000780| 3b 0d 0a 0d 0a 09 69 66 | 28 41 62 73 6f 6c 75 74 |;.....if|(Absolut|
|00000790| 65 46 6f 6e 74 20 21 3d | 20 4e 6f 6e 65 29 0d 0a |eFont !=| None)..|
|000007a0| 09 09 43 2e 46 6f 6e 74 | 20 3d 20 41 62 73 6f 6c |..C.Font| = Absol|
|000007b0| 75 74 65 46 6f 6e 74 3b | 0d 0a 09 65 6c 73 65 0d |uteFont;|...else.|
|000007c0| 0a 09 09 43 2e 46 6f 6e | 74 20 3d 20 52 6f 6f 74 |...C.Fon|t = Root|
|000007d0| 2e 46 6f 6e 74 73 5b 46 | 6f 6e 74 5d 3b 0d 0a 0d |.Fonts[F|ont];...|
|000007e0| 0a 09 69 66 28 4f 6c 64 | 57 20 21 3d 20 57 69 6e |..if(Old|W != Win|
|000007f0| 57 69 64 74 68 20 7c 7c | 20 4f 6c 64 48 20 21 3d |Width ||| OldH !=|
|00000800| 20 57 69 6e 48 65 69 67 | 68 74 29 0d 0a 09 7b 0d | WinHeig|ht)...{.|
|00000810| 0a 09 09 57 6f 72 64 57 | 72 61 70 28 43 2c 20 54 |...WordW|rap(C, T|
|00000820| 72 75 65 29 3b 0d 0a 09 | 09 4f 6c 64 57 20 3d 20 |rue);...|.OldW = |
|00000830| 57 69 6e 57 69 64 74 68 | 3b 0d 0a 09 09 4f 6c 64 |WinWidth|;....Old|
|00000840| 48 20 3d 20 57 69 6e 48 | 65 69 67 68 74 3b 0d 0a |H = WinH|eight;..|
|00000850| 09 09 62 57 72 61 70 70 | 65 64 20 3d 20 54 72 75 |..bWrapp|ed = Tru|
|00000860| 65 3b 0d 0a 09 7d 0d 0a | 09 65 6c 73 65 0d 0a 09 |e;...}..|.else...|
|00000870| 69 66 28 62 44 69 72 74 | 79 29 0d 0a 09 7b 0d 0a |if(bDirt|y)...{..|
|00000880| 09 09 57 6f 72 64 57 72 | 61 70 28 43 2c 20 46 61 |..WordWr|ap(C, Fa|
|00000890| 6c 73 65 29 3b 0d 0a 09 | 09 62 57 72 61 70 70 65 |lse);...|.bWrappe|
|000008a0| 64 20 3d 20 54 72 75 65 | 3b 0d 0a 09 7d 0d 0a 0d |d = True|;...}...|
|000008b0| 0a 09 69 66 28 62 57 72 | 61 70 70 65 64 29 0d 0a |..if(bWr|apped)..|
|000008c0| 09 7b 0d 0a 09 09 54 65 | 78 74 41 72 65 61 54 65 |.{....Te|xtAreaTe|
|000008d0| 78 74 53 69 7a 65 28 43 | 2c 20 22 41 22 2c 20 4a |xtSize(C|, "A", J|
|000008e0| 75 6e 6b 2c 20 44 65 66 | 61 75 6c 74 54 65 78 74 |unk, Def|aultText|
|000008f0| 48 65 69 67 68 74 29 3b | 0d 0a 09 09 56 69 73 69 |Height);|....Visi|
|00000900| 62 6c 65 52 6f 77 73 20 | 3d 20 57 69 6e 48 65 69 |bleRows |= WinHei|
|00000910| 67 68 74 20 2f 20 44 65 | 66 61 75 6c 74 54 65 78 |ght / De|faultTex|
|00000920| 74 48 65 69 67 68 74 3b | 0d 0a 09 09 43 6f 75 6e |tHeight;|....Coun|
|00000930| 74 20 3d 20 4c 69 73 74 | 2e 43 6f 75 6e 74 28 29 |t = List|.Count()|
|00000940| 3b 0d 0a 09 09 56 65 72 | 74 53 42 2e 53 65 74 52 |;....Ver|tSB.SetR|
|00000950| 61 6e 67 65 28 30 2c 20 | 43 6f 75 6e 74 2c 20 56 |ange(0, |Count, V|
|00000960| 69 73 69 62 6c 65 52 6f | 77 73 29 3b 0d 0a 0d 0a |isibleRo|ws);....|
|00000970| 09 09 69 66 28 62 53 63 | 72 6f 6c 6c 4f 6e 52 65 |..if(bSc|rollOnRe|
|00000980| 73 69 7a 65 29 0d 0a 09 | 09 7b 0d 0a 09 09 09 69 |size)...|.{.....i|
|00000990| 66 28 62 54 6f 70 43 65 | 6e 74 72 69 63 29 0d 0a |f(bTopCe|ntric)..|
|000009a0| 09 09 09 09 56 65 72 74 | 53 42 2e 50 6f 73 20 3d |....Vert|SB.Pos =|
|000009b0| 20 30 3b 0d 0a 09 09 09 | 65 6c 73 65 0d 0a 09 09 | 0;.....|else....|
|000009c0| 09 09 56 65 72 74 53 42 | 2e 50 6f 73 20 3d 20 56 |..VertSB|.Pos = V|
|000009d0| 65 72 74 53 42 2e 4d 61 | 78 50 6f 73 3b 0d 0a 09 |ertSB.Ma|xPos;...|
|000009e0| 09 7d 0d 0a 0d 0a 09 09 | 69 66 28 62 41 75 74 6f |.}......|if(bAuto|
|000009f0| 53 63 72 6f 6c 6c 62 61 | 72 20 26 26 20 21 62 56 |Scrollba|r && !bV|
|00000a00| 61 72 69 61 62 6c 65 52 | 6f 77 48 65 69 67 68 74 |ariableR|owHeight|
|00000a10| 29 0d 0a 09 09 7b 0d 0a | 09 09 09 69 66 28 43 6f |)....{..|...if(Co|
|00000a20| 75 6e 74 20 3c 3d 20 56 | 69 73 69 62 6c 65 52 6f |unt <= V|isibleRo|
|00000a30| 77 73 29 0d 0a 09 09 09 | 09 56 65 72 74 53 42 2e |ws).....|.VertSB.|
|00000a40| 48 69 64 65 57 69 6e 64 | 6f 77 28 29 3b 0d 0a 09 |HideWind|ow();...|
|00000a50| 09 09 65 6c 73 65 0d 0a | 09 09 09 09 56 65 72 74 |..else..|....Vert|
|00000a60| 53 42 2e 53 68 6f 77 57 | 69 6e 64 6f 77 28 29 3b |SB.ShowW|indow();|
|00000a70| 0d 0a 09 09 7d 0d 0a 09 | 7d 0d 0a 0d 0a 09 69 66 |....}...|}.....if|
|00000a80| 28 62 54 6f 70 43 65 6e | 74 72 69 63 29 0d 0a 09 |(bTopCen|tric)...|
|00000a90| 7b 0d 0a 09 09 53 6b 69 | 70 43 6f 75 6e 74 20 3d |{....Ski|pCount =|
|00000aa0| 20 56 65 72 74 53 42 2e | 50 6f 73 3b 0d 0a 09 09 | VertSB.|Pos;....|
|00000ab0| 4c 20 3d 20 55 57 69 6e | 64 6f 77 44 79 6e 61 6d |L = UWin|dowDynam|
|00000ac0| 69 63 54 65 78 74 52 6f | 77 28 4c 69 73 74 2e 4e |icTextRo|w(List.N|
|00000ad0| 65 78 74 29 3b 0d 0a 09 | 09 66 6f 72 28 69 3d 30 |ext);...|.for(i=0|
|00000ae0| 3b 20 69 20 3c 20 53 6b | 69 70 43 6f 75 6e 74 20 |; i < Sk|ipCount |
|00000af0| 26 26 20 28 4c 20 21 3d | 20 4e 6f 6e 65 29 20 3b |&& (L !=| None) ;|
|00000b00| 20 69 2b 2b 29 0d 0a 09 | 09 09 4c 20 3d 20 55 57 | i++)...|..L = UW|
|00000b10| 69 6e 64 6f 77 44 79 6e | 61 6d 69 63 54 65 78 74 |indowDyn|amicText|
|00000b20| 52 6f 77 28 4c 2e 4e 65 | 78 74 29 3b 0d 0a 0d 0a |Row(L.Ne|xt);....|
|00000b30| 09 09 69 66 28 62 56 43 | 65 6e 74 65 72 20 26 26 |..if(bVC|enter &&|
|00000b40| 20 43 6f 75 6e 74 20 3c | 3d 20 56 69 73 69 62 6c | Count <|= Visibl|
|00000b50| 65 52 6f 77 73 29 0d 0a | 09 09 09 59 20 3d 20 69 |eRows)..|...Y = i|
|00000b60| 6e 74 28 28 57 69 6e 48 | 65 69 67 68 74 20 2d 20 |nt((WinH|eight - |
|00000b70| 28 43 6f 75 6e 74 20 2a | 20 44 65 66 61 75 6c 74 |(Count *| Default|
|00000b80| 54 65 78 74 48 65 69 67 | 68 74 29 29 20 2f 20 32 |TextHeig|ht)) / 2|
|00000b90| 29 3b 0d 0a 09 09 65 6c | 73 65 0d 0a 09 09 09 59 |);....el|se.....Y|
|00000ba0| 20 3d 20 31 3b 0d 0a 0d | 0a 09 09 44 72 61 77 43 | = 1;...|...DrawC|
|00000bb0| 6f 75 6e 74 20 3d 20 30 | 3b 0d 0a 09 09 77 68 69 |ount = 0|;....whi|
|00000bc0| 6c 65 28 59 20 3c 20 57 | 69 6e 48 65 69 67 68 74 |le(Y < W|inHeight|
|00000bd0| 29 0d 0a 09 09 7b 0d 0a | 09 09 09 44 72 61 77 43 |)....{..|...DrawC|
|00000be0| 6f 75 6e 74 2b 2b 3b 0d | 0a 09 09 09 69 66 28 4c |ount++;.|....if(L|
|00000bf0| 20 21 3d 20 4e 6f 6e 65 | 29 0d 0a 09 09 09 7b 0d | != None|).....{.|
|00000c00| 0a 09 09 09 09 59 20 2b | 3d 20 44 72 61 77 54 65 |.....Y +|= DrawTe|
|00000c10| 78 74 4c 69 6e 65 28 43 | 2c 20 4c 2c 20 59 29 3b |xtLine(C|, L, Y);|
|00000c20| 0d 0a 09 09 09 09 4c 20 | 3d 20 55 57 69 6e 64 6f |......L |= UWindo|
|00000c30| 77 44 79 6e 61 6d 69 63 | 54 65 78 74 52 6f 77 28 |wDynamic|TextRow(|
|00000c40| 4c 2e 4e 65 78 74 29 3b | 0d 0a 09 09 09 7d 0d 0a |L.Next);|.....}..|
|00000c50| 09 09 09 65 6c 73 65 0d | 0a 09 09 09 09 59 20 2b |...else.|.....Y +|
|00000c60| 3d 20 44 65 66 61 75 6c | 74 54 65 78 74 48 65 69 |= Defaul|tTextHei|
|00000c70| 67 68 74 3b 0d 0a 09 09 | 7d 0d 0a 0d 0a 09 09 69 |ght;....|}......i|
|00000c80| 66 28 62 56 61 72 69 61 | 62 6c 65 52 6f 77 48 65 |f(bVaria|bleRowHe|
|00000c90| 69 67 68 74 29 0d 0a 09 | 09 7b 0d 0a 09 09 09 56 |ight)...|.{.....V|
|00000ca0| 69 73 69 62 6c 65 52 6f | 77 73 20 3d 20 44 72 61 |isibleRo|ws = Dra|
|00000cb0| 77 43 6f 75 6e 74 20 2d | 20 31 3b 0d 0a 0d 0a 09 |wCount -| 1;.....|
|00000cc0| 09 09 77 68 69 6c 65 28 | 56 65 72 74 53 42 2e 50 |..while(|VertSB.P|
|00000cd0| 6f 73 20 2b 20 56 69 73 | 69 62 6c 65 52 6f 77 73 |os + Vis|ibleRows|
|00000ce0| 20 3e 20 43 6f 75 6e 74 | 29 0d 0a 09 09 09 09 56 | > Count|)......V|
|00000cf0| 69 73 69 62 6c 65 52 6f | 77 73 2d 2d 3b 0d 0a 0d |isibleRo|ws--;...|
|00000d00| 0a 09 09 09 56 65 72 74 | 53 42 2e 53 65 74 52 61 |....Vert|SB.SetRa|
|00000d10| 6e 67 65 28 30 2c 20 43 | 6f 75 6e 74 2c 20 56 69 |nge(0, C|ount, Vi|
|00000d20| 73 69 62 6c 65 52 6f 77 | 73 29 3b 0d 0a 0d 0a 09 |sibleRow|s);.....|
|00000d30| 09 09 69 66 28 62 41 75 | 74 6f 53 63 72 6f 6c 6c |..if(bAu|toScroll|
|00000d40| 62 61 72 29 0d 0a 09 09 | 09 7b 0d 0a 09 09 09 09 |bar)....|.{......|
|00000d50| 69 66 28 43 6f 75 6e 74 | 20 3c 3d 20 56 69 73 69 |if(Count| <= Visi|
|00000d60| 62 6c 65 52 6f 77 73 29 | 0d 0a 09 09 09 09 09 56 |bleRows)|.......V|
|00000d70| 65 72 74 53 42 2e 48 69 | 64 65 57 69 6e 64 6f 77 |ertSB.Hi|deWindow|
|00000d80| 28 29 3b 0d 0a 09 09 09 | 09 65 6c 73 65 0d 0a 09 |();.....|.else...|
|00000d90| 09 09 09 09 56 65 72 74 | 53 42 2e 53 68 6f 77 57 |....Vert|SB.ShowW|
|00000da0| 69 6e 64 6f 77 28 29 3b | 0d 0a 09 09 09 7d 0d 0a |indow();|.....}..|
|00000db0| 09 09 7d 0d 0a 09 7d 0d | 0a 09 65 6c 73 65 0d 0a |..}...}.|..else..|
|00000dc0| 09 7b 0d 0a 09 09 53 6b | 69 70 43 6f 75 6e 74 20 |.{....Sk|ipCount |
|00000dd0| 3d 20 4d 61 78 28 30 2c | 20 43 6f 75 6e 74 20 2d |= Max(0,| Count -|
|00000de0| 20 28 56 69 73 69 62 6c | 65 52 6f 77 73 20 2b 20 | (Visibl|eRows + |
|00000df0| 56 65 72 74 53 42 2e 50 | 6f 73 29 29 3b 0d 0a 09 |VertSB.P|os));...|
|00000e00| 09 4c 20 3d 20 55 57 69 | 6e 64 6f 77 44 79 6e 61 |.L = UWi|ndowDyna|
|00000e10| 6d 69 63 54 65 78 74 52 | 6f 77 28 4c 69 73 74 2e |micTextR|ow(List.|
|00000e20| 4c 61 73 74 29 3b 0d 0a | 09 09 66 6f 72 28 69 3d |Last);..|..for(i=|
|00000e30| 30 3b 20 69 20 3c 20 53 | 6b 69 70 43 6f 75 6e 74 |0; i < S|kipCount|
|00000e40| 20 26 26 20 28 4c 20 21 | 3d 20 4c 69 73 74 29 20 | && (L !|= List) |
|00000e50| 3b 20 69 2b 2b 29 0d 0a | 09 09 09 4c 20 3d 20 55 |; i++)..|...L = U|
|00000e60| 57 69 6e 64 6f 77 44 79 | 6e 61 6d 69 63 54 65 78 |WindowDy|namicTex|
|00000e70| 74 52 6f 77 28 4c 2e 50 | 72 65 76 29 3b 0d 0a 0d |tRow(L.P|rev);...|
|00000e80| 0a 09 09 59 20 3d 20 57 | 69 6e 48 65 69 67 68 74 |...Y = W|inHeight|
|00000e90| 20 2d 20 44 65 66 61 75 | 6c 74 54 65 78 74 48 65 | - Defau|ltTextHe|
|00000ea0| 69 67 68 74 3b 0d 0a 09 | 09 77 68 69 6c 65 28 4c |ight;...|.while(L|
|00000eb0| 20 21 3d 20 4c 69 73 74 | 20 26 26 20 4c 20 21 3d | != List| && L !=|
|00000ec0| 20 4e 6f 6e 65 20 26 26 | 20 59 20 3e 20 2d 44 65 | None &&| Y > -De|
|00000ed0| 66 61 75 6c 74 54 65 78 | 74 48 65 69 67 68 74 29 |faultTex|tHeight)|
|00000ee0| 0d 0a 09 09 7b 0d 0a 09 | 09 09 44 72 61 77 54 65 |....{...|..DrawTe|
|00000ef0| 78 74 4c 69 6e 65 28 43 | 2c 20 4c 2c 20 59 29 3b |xtLine(C|, L, Y);|
|00000f00| 0d 0a 09 09 09 59 20 3d | 20 59 20 2d 20 44 65 66 |.....Y =| Y - Def|
|00000f10| 61 75 6c 74 54 65 78 74 | 48 65 69 67 68 74 3b 0d |aultText|Height;.|
|00000f20| 0a 09 09 09 4c 20 3d 20 | 55 57 69 6e 64 6f 77 44 |....L = |UWindowD|
|00000f30| 79 6e 61 6d 69 63 54 65 | 78 74 52 6f 77 28 4c 2e |ynamicTe|xtRow(L.|
|00000f40| 50 72 65 76 29 3b 0d 0a | 09 09 7d 0d 0a 09 7d 0d |Prev);..|..}...}.|
|00000f50| 0a 7d 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 55 |.}....fu|nction U|
|00000f60| 57 69 6e 64 6f 77 44 79 | 6e 61 6d 69 63 54 65 78 |WindowDy|namicTex|
|00000f70| 74 52 6f 77 20 41 64 64 | 54 65 78 74 28 73 74 72 |tRow Add|Text(str|
|00000f80| 69 6e 67 20 4e 65 77 4c | 69 6e 65 29 0d 0a 7b 0d |ing NewL|ine)..{.|
|00000f90| 0a 09 6c 6f 63 61 6c 20 | 55 57 69 6e 64 6f 77 44 |..local |UWindowD|
|00000fa0| 79 6e 61 6d 69 63 54 65 | 78 74 52 6f 77 20 4c 3b |ynamicTe|xtRow L;|
|00000fb0| 0d 0a 09 6c 6f 63 61 6c | 20 73 74 72 69 6e 67 20 |...local| string |
|00000fc0| 54 65 6d 70 3b 0d 0a 09 | 6c 6f 63 61 6c 20 69 6e |Temp;...|local in|
|00000fd0| 74 20 69 3b 0d 0a 0d 0a | 09 62 44 69 72 74 79 20 |t i;....|.bDirty |
|00000fe0| 3d 20 54 72 75 65 3b 0d | 0a 09 0d 0a 09 69 20 3d |= True;.|.....i =|
|00000ff0| 20 49 6e 53 74 72 28 4e | 65 77 4c 69 6e 65 2c 20 | InStr(N|ewLine, |
|00001000| 22 5c 5c 6e 22 29 3b 0d | 0a 09 69 66 28 69 20 21 |"\\n");.|..if(i !|
|00001010| 3d 20 2d 31 29 0d 0a 09 | 7b 0d 0a 09 09 54 65 6d |= -1)...|{....Tem|
|00001020| 70 20 3d 20 4d 69 64 28 | 4e 65 77 4c 69 6e 65 2c |p = Mid(|NewLine,|
|00001030| 20 69 2b 32 29 3b 0d 0a | 09 09 4e 65 77 4c 69 6e | i+2);..|..NewLin|
|00001040| 65 20 3d 20 4c 65 66 74 | 28 4e 65 77 4c 69 6e 65 |e = Left|(NewLine|
|00001050| 2c 20 69 29 3b 09 09 0d | 0a 09 7d 0d 0a 09 65 6c |, i);...|..}...el|
|00001060| 73 65 0d 0a 09 09 54 65 | 6d 70 20 3d 20 22 22 3b |se....Te|mp = "";|
|00001070| 0d 0a 09 0d 0a 0d 0a 09 | 2f 2f 20 72 65 75 73 65 |........|// reuse|
|00001080| 20 61 20 72 6f 77 20 69 | 66 20 70 6f 73 73 69 62 | a row i|f possib|
|00001090| 6c 65 0d 0a 09 4c 20 3d | 20 43 68 65 63 6b 4d 61 |le...L =| CheckMa|
|000010a0| 78 52 6f 77 73 28 29 3b | 0d 0a 0d 0a 09 69 66 28 |xRows();|.....if(|
|000010b0| 4c 20 21 3d 20 4e 6f 6e | 65 29 0d 0a 09 09 4c 69 |L != Non|e)....Li|
|000010c0| 73 74 2e 41 70 70 65 6e | 64 49 74 65 6d 28 4c 29 |st.Appen|dItem(L)|
|000010d0| 3b 0d 0a 09 65 6c 73 65 | 0d 0a 09 09 4c 20 3d 20 |;...else|....L = |
|000010e0| 55 57 69 6e 64 6f 77 44 | 79 6e 61 6d 69 63 54 65 |UWindowD|ynamicTe|
|000010f0| 78 74 52 6f 77 28 4c 69 | 73 74 2e 41 70 70 65 6e |xtRow(Li|st.Appen|
|00001100| 64 28 52 6f 77 43 6c 61 | 73 73 29 29 3b 0d 0a 0d |d(RowCla|ss));...|
|00001110| 0a 09 4c 2e 54 65 78 74 | 20 3d 20 4e 65 77 4c 69 |..L.Text| = NewLi|
|00001120| 6e 65 3b 0d 0a 09 4c 2e | 57 72 61 70 50 61 72 65 |ne;...L.|WrapPare|
|00001130| 6e 74 20 3d 20 4e 6f 6e | 65 3b 0d 0a 09 4c 2e 62 |nt = Non|e;...L.b|
|00001140| 52 6f 77 44 69 72 74 79 | 20 3d 20 54 72 75 65 3b |RowDirty| = True;|
|00001150| 0d 0a 0d 0a 09 69 66 28 | 54 65 6d 70 20 21 3d 20 |.....if(|Temp != |
|00001160| 22 22 29 0d 0a 09 09 41 | 64 64 54 65 78 74 28 54 |"")....A|ddText(T|
|00001170| 65 6d 70 29 3b 0d 0a 0d | 0a 09 72 65 74 75 72 6e |emp);...|..return|
|00001180| 20 4c 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 | L;..}..|..functi|
|00001190| 6f 6e 20 55 57 69 6e 64 | 6f 77 44 79 6e 61 6d 69 |on UWind|owDynami|
|000011a0| 63 54 65 78 74 52 6f 77 | 20 43 68 65 63 6b 4d 61 |cTextRow| CheckMa|
|000011b0| 78 52 6f 77 73 28 29 0d | 0a 7b 0d 0a 09 6c 6f 63 |xRows().|.{...loc|
|000011c0| 61 6c 20 55 57 69 6e 64 | 6f 77 44 79 6e 61 6d 69 |al UWind|owDynami|
|000011d0| 63 54 65 78 74 52 6f 77 | 20 4c 3b 0d 0a 09 4c 20 |cTextRow| L;...L |
|000011e0| 3d 20 4e 6f 6e 65 3b 0d | 0a 09 77 68 69 6c 65 28 |= None;.|..while(|
|000011f0| 4d 61 78 4c 69 6e 65 73 | 20 3e 20 30 20 26 26 20 |MaxLines| > 0 && |
|00001200| 4c 69 73 74 2e 43 6f 75 | 6e 74 28 29 20 3e 20 4d |List.Cou|nt() > M|
|00001210| 61 78 4c 69 6e 65 73 20 | 2d 20 31 20 26 26 20 4c |axLines |- 1 && L|
|00001220| 69 73 74 2e 4e 65 78 74 | 20 21 3d 20 4e 6f 6e 65 |ist.Next| != None|
|00001230| 29 0d 0a 09 7b 0d 0a 09 | 09 4c 20 3d 20 55 57 69 |)...{...|.L = UWi|
|00001240| 6e 64 6f 77 44 79 6e 61 | 6d 69 63 54 65 78 74 52 |ndowDyna|micTextR|
|00001250| 6f 77 28 4c 69 73 74 2e | 4e 65 78 74 29 3b 0d 0a |ow(List.|Next);..|
|00001260| 09 09 52 65 6d 6f 76 65 | 57 72 61 70 28 4c 29 3b |..Remove|Wrap(L);|
|00001270| 0d 0a 09 09 4c 2e 52 65 | 6d 6f 76 65 28 29 3b 0d |....L.Re|move();.|
|00001280| 0a 09 7d 0d 0a 09 72 65 | 74 75 72 6e 20 4c 3b 0d |..}...re|turn L;.|
|00001290| 0a 7d 0d 0a 0d 0a 66 75 | 6e 63 74 69 6f 6e 20 57 |.}....fu|nction W|
|000012a0| 6f 72 64 57 72 61 70 28 | 43 61 6e 76 61 73 20 43 |ordWrap(|Canvas C|
|000012b0| 2c 20 62 6f 6f 6c 20 62 | 46 6f 72 63 65 29 0d 0a |, bool b|Force)..|
|000012c0| 7b 0d 0a 09 6c 6f 63 61 | 6c 20 55 57 69 6e 64 6f |{...loca|l UWindo|
|000012d0| 77 44 79 6e 61 6d 69 63 | 54 65 78 74 52 6f 77 20 |wDynamic|TextRow |
|000012e0| 4c 3b 0d 0a 0d 0a 09 66 | 6f 72 28 4c 20 3d 20 55 |L;.....f|or(L = U|
|000012f0| 57 69 6e 64 6f 77 44 79 | 6e 61 6d 69 63 54 65 78 |WindowDy|namicTex|
|00001300| 74 52 6f 77 28 4c 69 73 | 74 2e 4e 65 78 74 29 3b |tRow(Lis|t.Next);|
|00001310| 20 4c 20 21 3d 20 4e 6f | 6e 65 3b 20 4c 20 3d 20 | L != No|ne; L = |
|00001320| 55 57 69 6e 64 6f 77 44 | 79 6e 61 6d 69 63 54 65 |UWindowD|ynamicTe|
|00001330| 78 74 52 6f 77 28 4c 2e | 4e 65 78 74 29 29 0d 0a |xtRow(L.|Next))..|
|00001340| 09 09 69 66 28 4c 2e 57 | 72 61 70 50 61 72 65 6e |..if(L.W|rapParen|
|00001350| 74 20 3d 3d 20 4e 6f 6e | 65 20 26 26 20 28 4c 2e |t == Non|e && (L.|
|00001360| 62 52 6f 77 44 69 72 74 | 79 20 7c 7c 20 62 46 6f |bRowDirt|y || bFo|
|00001370| 72 63 65 29 29 0d 0a 09 | 09 09 57 72 61 70 52 6f |rce))...|..WrapRo|
|00001380| 77 28 43 2c 20 4c 29 3b | 0d 0a 0d 0a 09 62 44 69 |w(C, L);|.....bDi|
|00001390| 72 74 79 20 3d 20 46 61 | 6c 73 65 3b 0d 0a 7d 0d |rty = Fa|lse;..}.|
|000013a0| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 57 72 61 70 |...funct|ion Wrap|
|000013b0| 52 6f 77 28 43 61 6e 76 | 61 73 20 43 2c 20 55 57 |Row(Canv|as C, UW|
|000013c0| 69 6e 64 6f 77 44 79 6e | 61 6d 69 63 54 65 78 74 |indowDyn|amicText|
|000013d0| 52 6f 77 20 4c 29 0d 0a | 7b 0d 0a 09 6c 6f 63 61 |Row L)..|{...loca|
|000013e0| 6c 20 55 57 69 6e 64 6f | 77 44 79 6e 61 6d 69 63 |l UWindo|wDynamic|
|000013f0| 54 65 78 74 52 6f 77 20 | 43 75 72 72 65 6e 74 52 |TextRow |CurrentR|
|00001400| 6f 77 2c 20 4e 3b 0d 0a | 09 6c 6f 63 61 6c 20 66 |ow, N;..|.local f|
|00001410| 6c 6f 61 74 20 4d 61 78 | 57 69 64 74 68 3b 0d 0a |loat Max|Width;..|
|00001420| 09 6c 6f 63 61 6c 20 69 | 6e 74 20 57 72 61 70 50 |.local i|nt WrapP|
|00001430| 6f 73 3b 0d 0a 0d 0a 09 | 69 66 28 57 72 61 70 57 |os;.....|if(WrapW|
|00001440| 69 64 74 68 20 3d 3d 20 | 30 29 0d 0a 09 7b 0d 0a |idth == |0)...{..|
|00001450| 09 09 69 66 28 56 65 72 | 74 53 42 2e 62 57 69 6e |..if(Ver|tSB.bWin|
|00001460| 64 6f 77 56 69 73 69 62 | 6c 65 20 7c 7c 20 62 41 |dowVisib|le || bA|
|00001470| 75 74 6f 53 63 72 6f 6c | 6c 62 61 72 29 0d 0a 09 |utoScrol|lbar)...|
|00001480| 09 09 4d 61 78 57 69 64 | 74 68 20 3d 20 57 69 6e |..MaxWid|th = Win|
|00001490| 57 69 64 74 68 20 2d 20 | 56 65 72 74 53 42 2e 57 |Width - |VertSB.W|
|000014a0| 69 6e 57 69 64 74 68 3b | 0d 0a 09 09 65 6c 73 65 |inWidth;|....else|
|000014b0| 0d 0a 09 09 09 4d 61 78 | 57 69 64 74 68 20 3d 20 |.....Max|Width = |
|000014c0| 57 69 6e 57 69 64 74 68 | 3b 0d 0a 09 7d 0d 0a 09 |WinWidth|;...}...|
|000014d0| 65 6c 73 65 0d 0a 09 09 | 4d 61 78 57 69 64 74 68 |else....|MaxWidth|
|000014e0| 20 3d 20 57 72 61 70 57 | 69 64 74 68 3b 0d 0a 0d | = WrapW|idth;...|
|000014f0| 0a 09 4c 2e 62 52 6f 77 | 44 69 72 74 79 20 3d 20 |..L.bRow|Dirty = |
|00001500| 46 61 6c 73 65 3b 0d 0a | 0d 0a 09 2f 2f 20 66 61 |False;..|...// fa|
|00001510| 73 74 20 63 68 65 63 6b | 20 2d 20 73 69 6e 67 6c |st check| - singl|
|00001520| 65 20 6c 69 6e 65 3f 0d | 0a 09 4e 20 3d 20 55 57 |e line?.|..N = UW|
|00001530| 69 6e 64 6f 77 44 79 6e | 61 6d 69 63 54 65 78 74 |indowDyn|amicText|
|00001540| 52 6f 77 28 4c 2e 4e 65 | 78 74 29 3b 0d 0a 09 69 |Row(L.Ne|xt);...i|
|00001550| 66 28 4e 20 3d 3d 20 4e | 6f 6e 65 20 7c 7c 20 4e |f(N == N|one || N|
|00001560| 2e 57 72 61 70 50 61 72 | 65 6e 74 20 21 3d 20 4c |.WrapPar|ent != L|
|00001570| 29 0d 0a 09 7b 0d 0a 09 | 09 69 66 28 47 65 74 57 |)...{...|.if(GetW|
|00001580| 72 61 70 50 6f 73 28 43 | 2c 20 4c 2c 20 4d 61 78 |rapPos(C|, L, Max|
|00001590| 57 69 64 74 68 29 20 3d | 3d 20 2d 31 29 0d 0a 09 |Width) =|= -1)...|
|000015a0| 09 09 72 65 74 75 72 6e | 3b 0d 0a 09 7d 0d 0a 0d |..return|;...}...|
|000015b0| 0a 09 52 65 6d 6f 76 65 | 57 72 61 70 28 4c 29 3b |..Remove|Wrap(L);|
|000015c0| 0d 0a 09 43 75 72 72 65 | 6e 74 52 6f 77 20 3d 20 |...Curre|ntRow = |
|000015d0| 4c 3b 0d 0a 0d 0a 09 77 | 68 69 6c 65 28 54 72 75 |L;.....w|hile(Tru|
|000015e0| 65 29 0d 0a 09 7b 0d 0a | 09 09 57 72 61 70 50 6f |e)...{..|..WrapPo|
|000015f0| 73 20 3d 20 47 65 74 57 | 72 61 70 50 6f 73 28 43 |s = GetW|rapPos(C|
|00001600| 2c 20 43 75 72 72 65 6e | 74 52 6f 77 2c 20 4d 61 |, Curren|tRow, Ma|
|00001610| 78 57 69 64 74 68 29 3b | 0d 0a 09 09 69 66 28 57 |xWidth);|....if(W|
|00001620| 72 61 70 50 6f 73 20 3d | 3d 20 2d 31 29 0d 0a 09 |rapPos =|= -1)...|
|00001630| 09 09 62 72 65 61 6b 3b | 0d 0a 0d 0a 09 09 43 75 |..break;|......Cu|
|00001640| 72 72 65 6e 74 52 6f 77 | 20 3d 20 53 70 6c 69 74 |rrentRow| = Split|
|00001650| 52 6f 77 41 74 28 43 75 | 72 72 65 6e 74 52 6f 77 |RowAt(Cu|rrentRow|
|00001660| 2c 20 57 72 61 70 50 6f | 73 29 3b 0d 0a 09 7d 0d |, WrapPo|s);...}.|
|00001670| 0a 7d 0d 0a 0d 0a 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |.}....//|////////|
|00001680| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00001690| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|000016a0| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 0d 0a 2f |////////|/////../|
|000016b0| 2f 20 46 75 6e 63 74 69 | 6f 6e 73 20 74 6f 20 6f |/ Functi|ons to o|
|000016c0| 76 65 72 72 69 64 65 20 | 74 6f 20 63 68 61 6e 67 |verride |to chang|
|000016d0| 65 20 66 6f 72 6d 61 74 | 2f 6c 61 79 6f 75 74 0d |e format|/layout.|
|000016e0| 0a 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |.///////|////////|
|000016f0| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00001700| 2f 2f 2f 2f 2f 2f 2f 2f | 2f 2f 2f 2f 2f 2f 2f 2f |////////|////////|
|00001710| 2f 2f 2f 2f 2f 2f 2f 2f | 0d 0a 0d 0a 66 75 6e 63 |////////|....func|
|00001720| 74 69 6f 6e 20 66 6c 6f | 61 74 20 44 72 61 77 54 |tion flo|at DrawT|
|00001730| 65 78 74 4c 69 6e 65 28 | 43 61 6e 76 61 73 20 43 |extLine(|Canvas C|
|00001740| 2c 20 55 57 69 6e 64 6f | 77 44 79 6e 61 6d 69 63 |, UWindo|wDynamic|
|00001750| 54 65 78 74 52 6f 77 20 | 4c 2c 20 66 6c 6f 61 74 |TextRow |L, float|
|00001760| 20 59 29 0d 0a 7b 0d 0a | 09 6c 6f 63 61 6c 20 66 | Y)..{..|.local f|
|00001770| 6c 6f 61 74 20 58 2c 20 | 57 2c 20 48 3b 0d 0a 0d |loat X, |W, H;...|
|00001780| 0a 09 69 66 28 62 48 43 | 65 6e 74 65 72 29 0d 0a |..if(bHC|enter)..|
|00001790| 09 7b 0d 0a 09 09 54 65 | 78 74 41 72 65 61 54 65 |.{....Te|xtAreaTe|
|000017a0| 78 74 53 69 7a 65 28 43 | 2c 20 4c 2e 54 65 78 74 |xtSize(C|, L.Text|
|000017b0| 2c 20 57 2c 20 48 29 3b | 0d 0a 09 09 69 66 28 56 |, W, H);|....if(V|
|000017c0| 65 72 74 53 42 2e 62 57 | 69 6e 64 6f 77 56 69 73 |ertSB.bW|indowVis|
|000017d0| 69 62 6c 65 29 0d 0a 09 | 09 09 58 20 3d 20 69 6e |ible)...|..X = in|
|000017e0| 74 28 28 28 57 69 6e 57 | 69 64 74 68 20 2d 20 56 |t(((WinW|idth - V|
|000017f0| 65 72 74 53 42 2e 57 69 | 6e 57 69 64 74 68 29 20 |ertSB.Wi|nWidth) |
|00001800| 2d 20 57 29 20 2f 20 32 | 29 3b 0d 0a 09 09 65 6c |- W) / 2|);....el|
|00001810| 73 65 0d 0a 09 09 09 58 | 20 3d 20 69 6e 74 28 28 |se.....X| = int((|
|00001820| 57 69 6e 57 69 64 74 68 | 20 2d 20 57 29 20 2f 20 |WinWidth| - W) / |
|00001830| 32 29 3b 0d 0a 09 7d 0d | 0a 09 65 6c 73 65 0d 0a |2);...}.|..else..|
|00001840| 09 09 58 20 3d 20 32 3b | 0d 0a 09 54 65 78 74 41 |..X = 2;|...TextA|
|00001850| 72 65 61 43 6c 69 70 54 | 65 78 74 28 43 2c 20 58 |reaClipT|ext(C, X|
|00001860| 2c 20 59 2c 20 4c 2e 54 | 65 78 74 29 3b 0d 0a 0d |, Y, L.T|ext);...|
|00001870| 0a 09 72 65 74 75 72 6e | 20 44 65 66 61 75 6c 74 |..return| Default|
|00001880| 54 65 78 74 48 65 69 67 | 68 74 3b 0d 0a 7d 0d 0a |TextHeig|ht;..}..|
|00001890| 0d 0a 0d 0a 2f 2f 20 66 | 69 6e 64 20 77 68 65 72 |....// f|ind wher|
|000018a0| 65 20 74 6f 20 62 72 65 | 61 6b 20 74 68 65 20 6c |e to bre|ak the l|
|000018b0| 69 6e 65 0d 0a 66 75 6e | 63 74 69 6f 6e 20 69 6e |ine..fun|ction in|
|000018c0| 74 20 47 65 74 57 72 61 | 70 50 6f 73 28 43 61 6e |t GetWra|pPos(Can|
|000018d0| 76 61 73 20 43 2c 20 55 | 57 69 6e 64 6f 77 44 79 |vas C, U|WindowDy|
|000018e0| 6e 61 6d 69 63 54 65 78 | 74 52 6f 77 20 4c 2c 20 |namicTex|tRow L, |
|000018f0| 66 6c 6f 61 74 20 4d 61 | 78 57 69 64 74 68 29 0d |float Ma|xWidth).|
|00001900| 0a 7b 0d 0a 09 6c 6f 63 | 61 6c 20 66 6c 6f 61 74 |.{...loc|al float|
|00001910| 20 57 2c 20 48 2c 20 4c | 69 6e 65 57 69 64 74 68 | W, H, L|ineWidth|
|00001920| 2c 20 4e 65 78 74 57 6f | 72 64 57 69 64 74 68 3b |, NextWo|rdWidth;|
|00001930| 0d 0a 09 6c 6f 63 61 6c | 20 73 74 72 69 6e 67 20 |...local| string |
|00001940| 49 6e 70 75 74 2c 20 4e | 65 78 74 57 6f 72 64 3b |Input, N|extWord;|
|00001950| 0d 0a 09 6c 6f 63 61 6c | 20 69 6e 74 20 57 6f 72 |...local| int Wor|
|00001960| 64 73 54 68 69 73 52 6f | 77 2c 20 57 72 61 70 50 |dsThisRo|w, WrapP|
|00001970| 6f 73 3b 0d 0a 0d 0a 09 | 2f 2f 20 71 75 69 63 6b |os;.....|// quick|
|00001980| 20 63 68 65 63 6b 0d 0a | 09 54 65 78 74 41 72 65 | check..|.TextAre|
|00001990| 61 54 65 78 74 53 69 7a | 65 28 43 2c 20 4c 2e 54 |aTextSiz|e(C, L.T|
|000019a0| 65 78 74 2c 20 57 2c 20 | 48 29 3b 0d 0a 09 69 66 |ext, W, |H);...if|
|000019b0| 28 57 20 3c 3d 20 4d 61 | 78 57 69 64 74 68 29 0d |(W <= Ma|xWidth).|
|000019c0| 0a 09 09 72 65 74 75 72 | 6e 20 2d 31 3b 0d 0a 0d |...retur|n -1;...|
|000019d0| 0a 09 49 6e 70 75 74 20 | 3d 20 4c 2e 54 65 78 74 |..Input |= L.Text|
|000019e0| 3b 0d 0a 09 57 6f 72 64 | 73 54 68 69 73 52 6f 77 |;...Word|sThisRow|
|000019f0| 20 3d 20 30 3b 0d 0a 09 | 4c 69 6e 65 57 69 64 74 | = 0;...|LineWidt|
|00001a00| 68 20 3d 20 30 3b 0d 0a | 09 57 72 61 70 50 6f 73 |h = 0;..|.WrapPos|
|00001a10| 20 3d 20 30 3b 0d 0a 09 | 4e 65 78 74 57 6f 72 64 | = 0;...|NextWord|
|00001a20| 20 3d 20 22 22 3b 0d 0a | 0d 0a 09 77 68 69 6c 65 | = "";..|...while|
|00001a30| 28 49 6e 70 75 74 20 21 | 3d 20 22 22 20 7c 7c 20 |(Input !|= "" || |
|00001a40| 4e 65 78 74 57 6f 72 64 | 20 21 3d 20 22 22 29 0d |NextWord| != "").|
|00001a50| 0a 09 7b 0d 0a 09 09 69 | 66 28 4e 65 78 74 57 6f |..{....i|f(NextWo|
|00001a60| 72 64 20 3d 3d 20 22 22 | 29 0d 0a 09 09 7b 0d 0a |rd == ""|)....{..|
|00001a70| 09 09 09 52 65 6d 6f 76 | 65 4e 65 78 74 57 6f 72 |...Remov|eNextWor|
|00001a80| 64 28 49 6e 70 75 74 2c | 20 4e 65 78 74 57 6f 72 |d(Input,| NextWor|
|00001a90| 64 29 3b 0d 0a 09 09 09 | 54 65 78 74 41 72 65 61 |d);.....|TextArea|
|00001aa0| 54 65 78 74 53 69 7a 65 | 28 43 2c 20 4e 65 78 74 |TextSize|(C, Next|
|00001ab0| 57 6f 72 64 2c 20 4e 65 | 78 74 57 6f 72 64 57 69 |Word, Ne|xtWordWi|
|00001ac0| 64 74 68 2c 20 48 29 3b | 0d 0a 09 09 7d 0d 0a 09 |dth, H);|....}...|
|00001ad0| 09 69 66 28 57 6f 72 64 | 73 54 68 69 73 52 6f 77 |.if(Word|sThisRow|
|00001ae0| 20 3e 20 30 20 26 26 20 | 4c 69 6e 65 57 69 64 74 | > 0 && |LineWidt|
|00001af0| 68 20 2b 20 4e 65 78 74 | 57 6f 72 64 57 69 64 74 |h + Next|WordWidt|
|00001b00| 68 20 3e 20 4d 61 78 57 | 69 64 74 68 29 0d 0a 09 |h > MaxW|idth)...|
|00001b10| 09 7b 0d 0a 09 09 09 72 | 65 74 75 72 6e 20 57 72 |.{.....r|eturn Wr|
|00001b20| 61 70 50 6f 73 3b 0d 0a | 09 09 7d 0d 0a 09 09 65 |apPos;..|..}....e|
|00001b30| 6c 73 65 0d 0a 09 09 7b | 0d 0a 09 09 09 57 72 61 |lse....{|.....Wra|
|00001b40| 70 50 6f 73 20 2b 3d 20 | 4c 65 6e 28 4e 65 78 74 |pPos += |Len(Next|
|00001b50| 57 6f 72 64 29 3b 0d 0a | 09 09 09 4c 69 6e 65 57 |Word);..|...LineW|
|00001b60| 69 64 74 68 20 2b 3d 20 | 4e 65 78 74 57 6f 72 64 |idth += |NextWord|
|00001b70| 57 69 64 74 68 3b 0d 0a | 09 09 09 4e 65 78 74 57 |Width;..|...NextW|
|00001b80| 6f 72 64 20 3d 20 22 22 | 3b 0d 0a 09 09 09 57 6f |ord = ""|;.....Wo|
|00001b90| 72 64 73 54 68 69 73 52 | 6f 77 2b 2b 3b 0d 0a 09 |rdsThisR|ow++;...|
|00001ba0| 09 7d 0d 0a 09 7d 0d 0a | 09 72 65 74 75 72 6e 20 |.}...}..|.return |
|00001bb0| 2d 31 3b 0d 0a 7d 0d 0a | 0d 0a 66 75 6e 63 74 69 |-1;..}..|..functi|
|00001bc0| 6f 6e 20 55 57 69 6e 64 | 6f 77 44 79 6e 61 6d 69 |on UWind|owDynami|
|00001bd0| 63 54 65 78 74 52 6f 77 | 20 53 70 6c 69 74 52 6f |cTextRow| SplitRo|
|00001be0| 77 41 74 28 55 57 69 6e | 64 6f 77 44 79 6e 61 6d |wAt(UWin|dowDynam|
|00001bf0| 69 63 54 65 78 74 52 6f | 77 20 4c 2c 20 69 6e 74 |icTextRo|w L, int|
|00001c00| 20 53 70 6c 69 74 50 6f | 73 29 0d 0a 7b 0d 0a 09 | SplitPo|s)..{...|
|00001c10| 6c 6f 63 61 6c 20 55 57 | 69 6e 64 6f 77 44 79 6e |local UW|indowDyn|
|00001c20| 61 6d 69 63 54 65 78 74 | 52 6f 77 20 4e 3b 0d 0a |amicText|Row N;..|
|00001c30| 0d 0a 09 4e 20 3d 20 55 | 57 69 6e 64 6f 77 44 79 |...N = U|WindowDy|
|00001c40| 6e 61 6d 69 63 54 65 78 | 74 52 6f 77 28 4c 2e 49 |namicTex|tRow(L.I|
|00001c50| 6e 73 65 72 74 41 66 74 | 65 72 28 52 6f 77 43 6c |nsertAft|er(RowCl|
|00001c60| 61 73 73 29 29 3b 0d 0a | 0d 0a 09 69 66 28 4c 2e |ass));..|...if(L.|
|00001c70| 57 72 61 70 50 61 72 65 | 6e 74 20 3d 3d 20 4e 6f |WrapPare|nt == No|
|00001c80| 6e 65 29 0d 0a 09 09 4e | 2e 57 72 61 70 50 61 72 |ne)....N|.WrapPar|
|00001c90| 65 6e 74 20 3d 20 4c 3b | 0d 0a 09 65 6c 73 65 0d |ent = L;|...else.|
|00001ca0| 0a 09 09 4e 2e 57 72 61 | 70 50 61 72 65 6e 74 20 |...N.Wra|pParent |
|00001cb0| 3d 20 4c 2e 57 72 61 70 | 50 61 72 65 6e 74 3b 0d |= L.Wrap|Parent;.|
|00001cc0| 0a 0d 0a 09 4e 2e 54 65 | 78 74 20 3d 20 4d 69 64 |....N.Te|xt = Mid|
|00001cd0| 28 4c 2e 54 65 78 74 2c | 20 53 70 6c 69 74 50 6f |(L.Text,| SplitPo|
|00001ce0| 73 29 3b 0d 0a 09 4c 2e | 54 65 78 74 20 3d 20 4c |s);...L.|Text = L|
|00001cf0| 65 66 74 28 4c 2e 54 65 | 78 74 2c 20 53 70 6c 69 |eft(L.Te|xt, Spli|
|00001d00| 74 50 6f 73 29 3b 0d 0a | 0d 0a 09 72 65 74 75 72 |tPos);..|...retur|
|00001d10| 6e 20 4e 3b 0d 0a 7d 0d | 0a 0d 0a 66 75 6e 63 74 |n N;..}.|...funct|
|00001d20| 69 6f 6e 20 52 65 6d 6f | 76 65 4e 65 78 74 57 6f |ion Remo|veNextWo|
|00001d30| 72 64 28 6f 75 74 20 73 | 74 72 69 6e 67 20 54 65 |rd(out s|tring Te|
|00001d40| 78 74 2c 20 6f 75 74 20 | 73 74 72 69 6e 67 20 4e |xt, out |string N|
|00001d50| 65 78 74 57 6f 72 64 29 | 0d 0a 7b 0d 0a 09 6c 6f |extWord)|..{...lo|
|00001d60| 63 61 6c 20 69 6e 74 20 | 69 3b 0d 0a 0d 0a 09 69 |cal int |i;.....i|
|00001d70| 20 3d 20 49 6e 53 74 72 | 28 54 65 78 74 2c 20 22 | = InStr|(Text, "|
|00001d80| 20 22 29 3b 0d 0a 09 69 | 66 28 69 20 3d 3d 20 2d | ");...i|f(i == -|
|00001d90| 31 29 0d 0a 09 7b 0d 0a | 09 09 4e 65 78 74 57 6f |1)...{..|..NextWo|
|00001da0| 72 64 20 3d 20 54 65 78 | 74 3b 0d 0a 09 09 54 65 |rd = Tex|t;....Te|
|00001db0| 78 74 20 3d 20 22 22 3b | 0d 0a 09 7d 0d 0a 09 65 |xt = "";|...}...e|
|00001dc0| 6c 73 65 0d 0a 09 7b 0d | 0a 09 09 77 68 69 6c 65 |lse...{.|...while|
|00001dd0| 28 4d 69 64 28 54 65 78 | 74 2c 20 69 2c 20 31 29 |(Mid(Tex|t, i, 1)|
|00001de0| 20 3d 3d 20 22 20 22 29 | 0d 0a 09 09 09 69 2b 2b | == " ")|.....i++|
|00001df0| 3b 0d 0a 0d 0a 09 09 4e | 65 78 74 57 6f 72 64 20 |;......N|extWord |
|00001e00| 3d 20 4c 65 66 74 28 54 | 65 78 74 2c 20 69 29 3b |= Left(T|ext, i);|
|00001e10| 0d 0a 09 09 54 65 78 74 | 20 3d 20 4d 69 64 28 54 |....Text| = Mid(T|
|00001e20| 65 78 74 2c 20 69 29 3b | 0d 0a 09 7d 0d 0a 7d 0d |ext, i);|...}..}.|
|00001e30| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 52 65 6d 6f |...funct|ion Remo|
|00001e40| 76 65 57 72 61 70 28 55 | 57 69 6e 64 6f 77 44 79 |veWrap(U|WindowDy|
|00001e50| 6e 61 6d 69 63 54 65 78 | 74 52 6f 77 20 4c 29 0d |namicTex|tRow L).|
|00001e60| 0a 7b 0d 0a 09 6c 6f 63 | 61 6c 20 55 57 69 6e 64 |.{...loc|al UWind|
|00001e70| 6f 77 44 79 6e 61 6d 69 | 63 54 65 78 74 52 6f 77 |owDynami|cTextRow|
|00001e80| 20 4e 3b 0d 0a 0d 0a 09 | 2f 2f 20 52 65 6d 6f 76 | N;.....|// Remov|
|00001e90| 65 20 70 72 65 76 69 6f | 75 73 20 77 6f 72 64 2d |e previo|us word-|
|00001ea0| 77 72 61 70 70 69 6e 67 | 0d 0a 09 4e 20 3d 20 55 |wrapping|...N = U|
|00001eb0| 57 69 6e 64 6f 77 44 79 | 6e 61 6d 69 63 54 65 78 |WindowDy|namicTex|
|00001ec0| 74 52 6f 77 28 4c 2e 4e | 65 78 74 29 3b 0d 0a 09 |tRow(L.N|ext);...|
|00001ed0| 77 68 69 6c 65 28 4e 20 | 21 3d 20 4e 6f 6e 65 20 |while(N |!= None |
|00001ee0| 26 26 20 4e 2e 57 72 61 | 70 50 61 72 65 6e 74 20 |&& N.Wra|pParent |
|00001ef0| 3d 3d 20 4c 29 0d 0a 09 | 7b 0d 0a 09 09 4c 2e 54 |== L)...|{....L.T|
|00001f00| 65 78 74 20 3d 20 4c 2e | 54 65 78 74 20 24 20 4e |ext = L.|Text $ N|
|00001f10| 2e 54 65 78 74 3b 0d 0a | 09 09 4e 2e 52 65 6d 6f |.Text;..|..N.Remo|
|00001f20| 76 65 28 29 3b 0d 0a 09 | 09 4e 20 3d 20 55 57 69 |ve();...|.N = UWi|
|00001f30| 6e 64 6f 77 44 79 6e 61 | 6d 69 63 54 65 78 74 52 |ndowDyna|micTextR|
|00001f40| 6f 77 28 4c 2e 4e 65 78 | 74 29 3b 0d 0a 09 7d 0d |ow(L.Nex|t);...}.|
|00001f50| 0a 7d 0d 0a 0d 0a 00 | |.}..... | |
+--------+-------------------------+-------------------------+--------+--------+